10 POKE 53280, 6: POKE 53281, 6
20 PRINT CHR$(147)
30 FOR C = 0 TO 63
40 READ BYTE
50 POKE 832 + C, BYTE
60 NEXT C
70 POKE 2040, 13
80 POKE 53287, 1
90 POKE 53248, 50: POKE 53249, 100: POKE 53264, 0
100 POKE 53269, 1
110 POKE 53271, 1: POKE 53277, 1
500 DATA 0, 60, 0, 0, 195, 224, 1
510 DATA 64, 48, 2, 36, 76, 4, 31
520 DATA 76, 4, 31, 224, 12, 223, 144
530 DATA 29, 57, 136, 62, 16, 132, 126
540 DATA 68, 130, 126, 170, 226, 117, 0
550 DATA 94, 100, 0, 67, 68, 40, 67
560 DATA 196, 16, 64, 194, 130, 128, 2
570 DATA 108, 128, 1, 17, 0, 0, 130
580 DATA 0, 0, 68, 0, 0, 56, 0
590 DATA 0